home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d1 / basictut.arc / INTEREST.BAS (.txt) < prev    next >
Encoding:
GW-BASIC  |  1989-01-07  |  215 b   |  6 lines
  1. 10  INPUT "Enter the amount of principle.",PRIN
  2. 20  INPUT "What is the interest rate (use decimal, omit leading 0's)";RATE
  3. 30  INTEREST=PRIN*RATE
  4. 35  LET INTEREST=INTEREST/100
  5. 40  PRINT "$";INTEREST;"on $";PRIN;"at";RATE;"%"
  6.